home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / mus / play / SongPlayer.lha / songplayer / arexx / Play.rexx next >
OS/2 REXX Batch file  |  1998-03-18  |  192b  |  14 lines
  1. /* Arexx Play command of SongPlayer */
  2.  
  3. MYPORT = 'SONGPLAYER.1'
  4.  
  5. IF ~SHOW( 'P', MYPORT ) THEN DO
  6.    SAY 'SongPlayer is not running.'
  7.    EXIT 10
  8. END
  9.  
  10. ADDRESS VALUE MYPORT
  11. OPTIONS RESULTS
  12.  
  13. PLAY
  14.